
// Copyright (c) 2010-2021 niXman (github dot nixman at pm dot me). All
// rights reserved.
//
// This file is part of YAS(https://github.com/niXman/yas) project.
//
// Distributed under the Boost Software License, Version 1.0. (See accompanying
// file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
//
//
//
// Boost Software License - Version 1.0 - August 17th, 2003
//
// Permission is hereby granted, free of charge, to any person or organization
// obtaining a copy of the software and accompanying documentation covered by
// this license (the "Software") to use, reproduce, display, distribute,
// execute, and transmit the Software, and to prepare derivative works of the
// Software, and to permit third-parties to whom the Software is furnished to
// do so, all subject to the following:
//
// The copyright notices in the Software and this entire statement, including
// the above license grant, this restriction and the following disclaimer,
// must be included in all copies of the Software, in whole or in part, and
// all derivative works of the Software, unless such copies or derivative
// works are solely in the form of machine-executable object code generated by
// a source language processor.
//
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
// FITNESS FOR A PARTICULAR PURPOSE, TITLE AND NON-INFRINGEMENT. IN NO EVENT
// SHALL THE COPYRIGHT HOLDERS OR ANYONE DISTRIBUTING THE SOFTWARE BE LIABLE
// FOR ANY DAMAGES OR OTHER LIABILITY, WHETHER IN CONTRACT, TORT OR OTHERWISE,
// ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
// DEALINGS IN THE SOFTWARE.

#ifndef __yas__types__boost__boost_fusion_tuple_serializers_hpp
#define __yas__types__boost__boost_fusion_tuple_serializers_hpp

#include <yas/detail/config/config.hpp>

#if defined(YAS_SERIALIZE_BOOST_TYPES)
#include <yas/detail/type_traits/type_traits.hpp>
#include <yas/detail/type_traits/serializer.hpp>
#include <yas/detail/io/serialization_exceptions.hpp>

#include <boost/fusion/tuple.hpp>
#include <boost/fusion/sequence/intrinsic/at_c.hpp>
#include <boost/fusion/include/at_c.hpp>


namespace yas {
namespace detail {

/***************************************************************************/

template<std::size_t F, typename... Types>
struct serializer<
	 type_prop::not_a_fundamental
	,ser_case::use_internal_serializer
	,F
	,boost::fusion::tuple<Types...>
> {
    template<typename Archive>
    static Archive& save(Archive& ar, const boost::fusion::tuple<Types...> &tuple) {
        __YAS_CONSTEXPR_IF ( F & options::binary ) {
            ar.write(__YAS_SCAST(std::uint8_t, sizeof...(Types)));
        } else if ( F & yas::text ) {
            ar.write(sizeof...(Types));
        }

        __YAS_CONSTEXPR_IF ( F & yas::json ) { ar.write("[", 1); }

        apply(ar, tuple);

        __YAS_CONSTEXPR_IF ( F & yas::json ) { ar.write("]", 1); }

        return ar;
    }

    template<typename Archive>
    static Archive& load(Archive& ar, boost::fusion::tuple<Types...> &tuple) {
        __YAS_CONSTEXPR_IF ( F & options::binary ) {
            std::uint8_t size = 0;
            ar.read(size);
            if ( size != sizeof...(Types) ) { __YAS_THROW_WRONG_SIZE_ON_DESERIALIZE(fusion::tuple); }
        } else if ( F & yas::text ) {
            std::uint32_t size = 0;
            ar.read(size);
            if ( size != sizeof...(Types) ) { __YAS_THROW_WRONG_SIZE_ON_DESERIALIZE(fusion::tuple); }
        }

        __YAS_CONSTEXPR_IF ( F & yas::json ) {
            __YAS_THROW_IF_WRONG_JSON_CHARS(ar, "[");
        }

        apply(ar, tuple);

        __YAS_CONSTEXPR_IF ( F & yas::json ) {
            __YAS_THROW_IF_WRONG_JSON_CHARS(ar, "]");
        }

        return ar;
    }

private:
    template<std::size_t I = 0, typename Archive, typename... Tp>
    static typename std::enable_if<I == sizeof...(Tp), Archive&>::type
    apply(Archive &ar, const boost::fusion::tuple<Tp...> &)
    { return ar; }
    template<std::size_t I = 0, typename Archive, typename... Tp>
    static typename std::enable_if<I < sizeof...(Tp), Archive&>::type
    apply(Archive &ar, const boost::fusion::tuple<Tp...> &t) {
        using tuple_element_name_t = tuple_element_name<I>;
        ar & YAS_OBJECT_NVP(
             nullptr
            ,(tuple_element_name_t::c_str(), boost::fusion::at_c<I>(t))
        );

        __YAS_CONSTEXPR_IF ( (F & yas::json) && I+1 < sizeof...(Tp) ) {
            ar.write(",", 1);
        }

        return apply<I+1>(ar, t);
    }

    template<std::size_t I = 0, typename Archive, typename... Tp>
    static typename std::enable_if<I == sizeof...(Tp), Archive&>::type
    apply(Archive &ar, boost::fusion::tuple<Tp...> &)
    { return ar; }
    template<std::size_t I = 0, typename Archive, typename... Tp>
    static typename std::enable_if<I < sizeof...(Tp), Archive&>::type
    apply(Archive &ar, boost::fusion::tuple<Tp...> &t) {
        using tuple_element_name_t = tuple_element_name<I>;
        ar & YAS_OBJECT_NVP(
             nullptr
            ,(tuple_element_name_t::c_str(), boost::fusion::at_c<I>(t))
        );

        __YAS_CONSTEXPR_IF ( (F & yas::json) && I+1 < sizeof...(Tp) ) {
            __YAS_THROW_IF_WRONG_JSON_CHARS(ar, ",");
        }

        return apply<I+1>(ar, t);
    }
};

/***************************************************************************/

} // namespace detail
} // namespace yas

#endif // defined(YAS_SERIALIZE_BOOST_TYPES)

#endif // __yas__types__boost__boost_fusion_tuple_serializers_hpp
